home *** CD-ROM | disk | FTP | other *** search
/ Kit PC World De Ampliacion De Windows 95 / Kit PC World de ampliacion de Windows 95.iso / clarion / 3rdparty / tools / toolcrft / tcpopup.clw < prev    next >
Encoding:
Text File  |  1995-10-23  |  1.3 KB  |  30 lines
  1. !-------------------------------------------------------------------!
  2. !                                                                   !
  3. ! Copyright 1995 by ToolCraft Development Corporation               !
  4. !                                                                   !
  5. !                   ALL RIGHTS RESERVED                             !
  6. !-------------------------------------------------------------------!
  7.  
  8.  
  9.   SECTION('PopupLibrary')
  10. !-------------------  PopupMenu Library MAP Additions -------------
  11.   MODULE('TCPOPUP.LIB')
  12.     AliasPopup(LONG,<LONG>,<LONG>)
  13.     CreatePopup(LONG,STRING)
  14.     DisablePopup(SHORT,SHORT,<SHORT>)
  15.     EnablePopup(SHORT,SHORT,<SHORT>)
  16.     HidePopup(SHORT,<SHORT>,<SHORT>)
  17.     UnhidePopup(SHORT,<SHORT>,<SHORT>)
  18.     PopupIsChecked(SHORT,SHORT),BYTE
  19.     SetPopupChecked(SHORT,SHORT,BYTE)
  20.     SetPopupText(SHORT,SHORT,STRING)
  21.     FreePopups(<USHORT>)
  22.   END
  23. !--------------------------------------------------------------------
  24.  
  25.   SECTION('PopupGlobals')
  26. !-------------------  PowerBrowse Global Declarations ---------------
  27. POPUP:EVENT:Accepted    SHORT(501h)        !Popup Event Number
  28. POPUP:Choice            SHORT              !Menu Choice Return Value
  29. !--------------------------------------------------------------------
  30.